(describe-mode): Don't avoid loop indirecting thru value of INDICATOR.

diff --git a/lisp/help.el b/lisp/help.el
index f99f6d20cd1ff8d831cbde54d4c46b01086a78b6..558119598af3f43391399b62d1a54d447be88b5b 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -349,7 +349,9 @@ describes the minor mode."
                          (capitalize
                           (substring (symbol-name minor-mode)
                                      0 (match-beginning 0)))))
-               (while (and indicator (symbolp indicator))
+               (while (and indicator (symbolp indicator)
+                           (boundp indicator)
+                           (not (eq indicator (symbol-value indicator))))
                  (setq indicator (symbol-value indicator)))
                (if first
                    (princ "The minor modes are described first,